home *** CD-ROM | disk | FTP | other *** search
/ PC Format (UK) 86 / PC_Format_September1998_Issue86.iso / Tech / DIRECTOR / data.z / Behavior Library.cst / 00038_Video Rewind.ls < prev    next >
Encoding:
Text File  |  1997-05-09  |  781 b   |  34 lines
  1. -- Video Rewind MouseUp
  2.  
  3.  
  4. -- a control
  5. -- use in combination with Button PushButton to create a better control button.
  6.  
  7.  
  8.  
  9. property videoSprite -- the sprite number that is getting controlled
  10.  
  11. on mouseUp me
  12.   set the movietime of sprite the VideoSprite of me = 0
  13. end
  14.  
  15.  
  16.  
  17. on getPropertyDescriptionList
  18.   set p_list = [ ┬¼
  19.    #videoSprite: [ #comment: "Video Sprite Channel:", ┬¼
  20.                     #format: #integer, ┬¼
  21.                    #default:  1 ] ┬¼
  22.                  ]
  23.   return p_list 
  24. end
  25.  
  26. on getBehaviorDescription
  27.   return ┬¼
  28. "Rewinds a digital video sprite in the current frame. Attach to a button with the appropriate label." & RETURN & ┬¼
  29. "PARAMETERS:" & RETURN & ┬¼
  30. "ΓÇó Video Sprite - Enter the number of the sprite channel in which the video is displayed."  
  31.   
  32. end
  33.  
  34.